home *** CD-ROM | disk | FTP | other *** search
/ Complete Linux / Complete Linux.iso / docs / system / filesyst / dosfs / dosfsck_.z / dosfsck_ / dosfsck / file.c < prev    next >
C/C++ Source or Header  |  1993-05-10  |  5KB  |  233 lines
  1. /* file.c  -  Additional file attributes */
  2.  
  3. /* Written 1993 by Werner Almesberger */
  4.  
  5.  
  6. #include <stdlib.h>
  7. #include <stdio.h>
  8. #include <string.h>
  9. #include <ctype.h>
  10. #include <unistd.h>
  11.  
  12. #include <linux/msdos_fs.h>
  13.  
  14. #include "common.h"
  15. #include "file.h"
  16.  
  17.  
  18. FDSC *fp_root = NULL;
  19.  
  20.  
  21. static void put_char(char **p,unsigned char c)
  22. {
  23.     if (c >= ' ' && c < 0x7f) *(*p)++ = c;
  24.     else {
  25.     *(*p)++ = '\\';
  26.     *(*p)++ = '0'+(c >> 6);
  27.     *(*p)++ = '0'+((c >> 3) & 7);
  28.     *(*p)++ = '0'+(c & 7);
  29.     }
  30. }
  31.  
  32.  
  33. char *file_name(unsigned char *fixed)
  34. {
  35.     static char path[MSDOS_NAME*4+2];
  36.     char *p;
  37.     int i,j;
  38.  
  39.     p = path;
  40.     for (i = j =  0; i < 8; i++)
  41.     if (fixed[i] != ' ') {
  42.         while (j++ < i) *p++ = ' ';
  43.         put_char(&p,fixed[i]);
  44.     }
  45.     if (strncmp(fixed+8,"   ",3)) {
  46.     *p++ = '.';
  47.     for (i = j =  0; i < 3; i++)
  48.         if (fixed[i+8] != ' ') {
  49.         while (j++ < i) *p++ = ' ';
  50.         put_char(&p,fixed[i+8]);
  51.         }
  52.     }
  53.     *p = 0;
  54.     return path;
  55. }
  56.  
  57.  
  58. int file_cvt(unsigned char *name,unsigned char *fixed)
  59. {
  60.     unsigned char c;
  61.     int size,ext,cnt;
  62.  
  63.     size = 8;
  64.     ext = 0;
  65.     while (*name) {
  66.     c = *name;
  67.     if (c < ' ' || c > 0x7e || strchr("*?<>|\"/",c)) {
  68.         printf("Invalid character in name. Use \\ooo for special "
  69.           "characters.\n");
  70.         return 0;
  71.     }
  72.     if (c == '.') {
  73.         if (ext) {
  74.         printf("Duplicate dots in name.\n");
  75.         return 0;
  76.         }
  77.         while (size--) *fixed++ = ' ';
  78.         size = 3;
  79.         ext = 1;
  80.         name++;
  81.         continue;
  82.     }
  83.     if (c == '\\') {
  84.         c = 0;
  85.         for (cnt = 3; cnt; cnt--) {
  86.         if (*name < '0' || *name > '7') {
  87.             printf("Invalid octal character.\n");
  88.             return 0;
  89.         }
  90.         c = c*8+*name++-'0';
  91.         }
  92.         if (cnt < 4) {
  93.         printf("Expected three octal digits.\n");
  94.         return 0;
  95.         }
  96.         name += 3;
  97.     }
  98.     if (islower(c)) c = toupper(c);
  99.     if (size) {
  100.         *fixed++ = c;
  101.         size--;
  102.     }
  103.     name++;
  104.     }
  105.     if (*name || size == 8) return 0;
  106.     if (!ext) {
  107.     while (size--) *fixed++ = ' ';
  108.     size = 3;
  109.     }
  110.     while (size--) *fixed++ = ' ';
  111.     return 1;
  112. }
  113.  
  114.  
  115. void file_add(char *path,FD_TYPE type)
  116. {
  117.     FDSC **current,*walk;
  118.     char name[MSDOS_NAME];
  119.     char *here;
  120.  
  121.     current = &fp_root;
  122.     if (*path != '/') die("%s: Absolute path required.",path);
  123.     path++;
  124.     while (1) {
  125.     if (here = strchr(path,'/')) *here = 0;
  126.     if (!file_cvt(path,name)) exit(2);
  127.     for (walk = *current; walk; walk = walk->next)
  128.         if (!here && (!strncmp(name,walk->name,MSDOS_NAME) || (type ==
  129.           fdt_undelete && !strncmp(name+1,walk->name+1,MSDOS_NAME-1))))
  130.         die("Ambiguous name: \"%s\"",path);
  131.         else if (here && !strncmp(name,walk->name,MSDOS_NAME)) break;
  132.     if (!walk) {
  133.         walk = alloc(sizeof(FDSC));
  134.         strncpy(walk->name,name,MSDOS_NAME);
  135.         walk->type = here ? fdt_none : type;
  136.         walk->first = NULL;
  137.         walk->next = *current;
  138.         *current = walk;
  139.     }
  140.     current = &walk->first;
  141.     if (!here) break;
  142.     *here = '/';
  143.     path = here+1;
  144.     }
  145. }
  146.  
  147.  
  148. FDSC **file_cd(FDSC **curr,char *fixed)
  149. {
  150.     FDSC **walk;
  151.  
  152.     if (!curr || !*curr) return NULL;
  153.     for (walk = curr; *walk; walk = &(*walk)->next)
  154.     if (!strncmp((*walk)->name,fixed,MSDOS_NAME) && (*walk)->first)
  155.         return &(*walk)->first;
  156.     return NULL;
  157. }
  158.  
  159.  
  160. static FDSC **file_find(FDSC **dir,char *fixed)
  161. {
  162.     if (!dir || !*dir) return NULL;
  163.     if (*(unsigned char *) fixed == DELETED_FLAG) {
  164.     while (*dir) {
  165.         if (!strncmp((*dir)->name+1,fixed+1,MSDOS_NAME-1) && !(*dir)->first)
  166.         return dir;
  167.         dir = &(*dir)->next;
  168.     }
  169.     return NULL;
  170.     }
  171.     while (*dir) {
  172.     if (!strncmp((*dir)->name,fixed,MSDOS_NAME) && !(*dir)->first)
  173.         return dir;
  174.     dir = &(*dir)->next;
  175.     }
  176.     return NULL;
  177. }
  178.  
  179.  
  180. FD_TYPE file_type(FDSC **curr,char *fixed)
  181. {
  182.     FDSC **this;
  183.  
  184.     if (this = file_find(curr,fixed)) return (*this)->type;
  185.     return fdt_none;
  186. }
  187.  
  188.  
  189. void file_modify(FDSC **curr,char *fixed)
  190. {
  191.     FDSC **this,*next;
  192.  
  193.     if (!(this = file_find(curr,fixed)))
  194.     die("Internal error: file_find failed");
  195.     switch ((*this)->type) {
  196.     case fdt_drop:
  197.         printf("Dropping %s\n",file_name(fixed));
  198.         *(unsigned char *) fixed = DELETED_FLAG;
  199.         break;
  200.     case fdt_undelete:
  201.         *fixed = *(*this)->name;
  202.         printf("Undeleting %s\n",file_name(fixed));
  203.         break;
  204.     default:
  205.         die("Internal error: file_modify");
  206.     }
  207.     next = (*this)->next;
  208.     free(*this);
  209.     *this = next;
  210. }
  211.  
  212.  
  213. static void report_unused(FDSC *this)
  214. {
  215.     FDSC *next;
  216.  
  217.     while (this) {
  218.     next = this->next;
  219.     if (this->first) report_unused(this->first);
  220.     else if (this->type != fdt_none)
  221.         printf("Warning: did not %s file %s\n",this->type == fdt_drop ?
  222.           "drop" : "undelete",file_name(this->name));
  223.     free(this);
  224.     this = next;
  225.     }
  226. }
  227.  
  228.  
  229. void file_unused(void)
  230. {
  231.     report_unused(fp_root);
  232. }
  233.